home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 4 / BBS in a Box - Macintosh - Volume IV (January 1992) (BBS in a Box).iso / Files / Hyper / G / GROUP1.cpt / GROUP1 Folder / Group 1 Analysis / card_12374.txt < prev    next >
Encoding:
Text File  |  1991-08-08  |  5.3 KB  |  238 lines
  1. -- card: 12374 from stack: in
  2. -- bmap block id: 12623
  3. -- flags: 0000
  4. -- background id: 2801
  5. -- name: feedbck
  6. ----- HyperTalk script -----
  7. on opencard
  8.   global silver,mercury,lead,silvera,mercurya,leada,score,time1,time2
  9.   put empty into card field "time"
  10.   if silvera = "silver" then set the highlight of card button "Silver" to true
  11.   if mercurya = "Mercury" then set the highlight of card button "Mercury" to true
  12.   if leada = "lead" then set the highlight of card button "lead" to true
  13.   if silver = silvera then put "correct" into card field "silver"
  14.   if mercury = mercurya then put "correct" into card field "mercury"
  15.   if lead = leada then put "correct" into card field "lead"
  16.   if silver <> silvera then put "incorrect" into card field "silver"
  17.   if mercury <> mercurya then put "incorrect" into card field "mercury"
  18.   if lead <> leada then put incorrect into card field "lead"
  19.   put time2-time1 into secCt
  20.   if secCt > 0 then
  21.     put "You used " & secCt & " Seconds to run the Unknown" into card field "time"
  22.   end if
  23.  
  24. end opencard
  25.  
  26.  
  27. on closeCard
  28.   put empty into card field "silver"
  29.   put empty into card field "mercury"
  30.   put empty into card field "lead"
  31.   set the highlight of card button "silver" to false
  32.   set the highlight of card button "mercury" to false
  33.   set the highlight of card button "lead" to false
  34. end closeCard
  35.  
  36.  
  37.  
  38. -- part 3 (button)
  39. -- low flags: 00
  40. -- high flags: 0000
  41. -- rect: left=321 top=54 right=132 bottom=399
  42. -- title width / last selected line: 0
  43. -- icon id / first selected line: 0 / 0
  44. -- text alignment: 1
  45. -- font id: 0
  46. -- text size: 12
  47. -- style flags: 0
  48. -- line height: 16
  49. -- part name: Lead
  50. ----- HyperTalk script -----
  51. on mouseUp
  52.  
  53. end mouseUp
  54.  
  55.  
  56.  
  57. -- part 4 (button)
  58. -- low flags: 00
  59. -- high flags: 0000
  60. -- rect: left=220 top=54 right=132 bottom=298
  61. -- title width / last selected line: 0
  62. -- icon id / first selected line: 0 / 0
  63. -- text alignment: 1
  64. -- font id: 0
  65. -- text size: 12
  66. -- style flags: 0
  67. -- line height: 16
  68. -- part name: Mercury
  69. ----- HyperTalk script -----
  70. on mouseUp
  71.  
  72. end mouseUp
  73.  
  74.  
  75.  
  76. -- part 5 (button)
  77. -- low flags: 00
  78. -- high flags: 0000
  79. -- rect: left=119 top=54 right=132 bottom=197
  80. -- title width / last selected line: 0
  81. -- icon id / first selected line: 0 / 0
  82. -- text alignment: 1
  83. -- font id: 0
  84. -- text size: 12
  85. -- style flags: 0
  86. -- line height: 16
  87. -- part name: Silver
  88. ----- HyperTalk script -----
  89. on mouseUp
  90.  
  91. end mouseUp
  92.  
  93.  
  94.  
  95. -- part 6 (field)
  96. -- low flags: 01
  97. -- high flags: 0000
  98. -- rect: left=115 top=139 right=162 bottom=200
  99. -- title width / last selected line: 0
  100. -- icon id / first selected line: 0 / 0
  101. -- text alignment: 1
  102. -- font id: 21
  103. -- text size: 18
  104. -- style flags: 0
  105. -- line height: 24
  106. -- part name: silver
  107.  
  108.  
  109. -- part 7 (field)
  110. -- low flags: 01
  111. -- high flags: 0000
  112. -- rect: left=216 top=139 right=162 bottom=301
  113. -- title width / last selected line: 0
  114. -- icon id / first selected line: 0 / 0
  115. -- text alignment: 1
  116. -- font id: 21
  117. -- text size: 18
  118. -- style flags: 0
  119. -- line height: 24
  120. -- part name: Mercury
  121.  
  122.  
  123. -- part 8 (field)
  124. -- low flags: 01
  125. -- high flags: 0000
  126. -- rect: left=317 top=139 right=162 bottom=402
  127. -- title width / last selected line: 0
  128. -- icon id / first selected line: 0 / 0
  129. -- text alignment: 1
  130. -- font id: 21
  131. -- text size: 18
  132. -- style flags: 0
  133. -- line height: 24
  134. -- part name: lead
  135.  
  136.  
  137. -- part 9 (field)
  138. -- low flags: 01
  139. -- high flags: 0004
  140. -- rect: left=59 top=166 right=200 bottom=447
  141. -- title width / last selected line: 0
  142. -- icon id / first selected line: 0 / 0
  143. -- text alignment: 1
  144. -- font id: 21
  145. -- text size: 18
  146. -- style flags: 0
  147. -- line height: 24
  148. -- part name: time
  149.  
  150.  
  151. -- part 10 (button)
  152. -- low flags: 00
  153. -- high flags: 8003
  154. -- rect: left=399 top=297 right=339 bottom=507
  155. -- title width / last selected line: 0
  156. -- icon id / first selected line: 0 / 0
  157. -- text alignment: 1
  158. -- font id: 0
  159. -- text size: 12
  160. -- style flags: 0
  161. -- line height: 16
  162. -- part name: Quit
  163. ----- HyperTalk script -----
  164. on mouseUp
  165.   answer "Go Home?" with "yes" or "Cancel"
  166.   if it is "Yes" then go Home
  167. end mouseUp
  168.  
  169.  
  170.  
  171. -- part 11 (button)
  172. -- low flags: 00
  173. -- high flags: 8003
  174. -- rect: left=5 top=296 right=339 bottom=125
  175. -- title width / last selected line: 0
  176. -- icon id / first selected line: 0 / 0
  177. -- text alignment: 1
  178. -- font id: 0
  179. -- text size: 12
  180. -- style flags: 0
  181. -- line height: 16
  182. -- part name: Return to Menu
  183. ----- HyperTalk script -----
  184. on mouseUp
  185.   global time1,time2
  186.   answer "Go to Main Menu?" with "no" or "Yes"
  187.   if it is "Yes" then
  188.     put 0 into time1
  189.     put 0 into time2
  190.  
  191.     go card "Menu"
  192.   end if
  193. end mouseUp
  194.  
  195.  
  196.  
  197. -- part 12 (field)
  198. -- low flags: 80
  199. -- high flags: 0000
  200. -- rect: left=135 top=207 right=239 bottom=260
  201. -- title width / last selected line: 0
  202. -- icon id / first selected line: 0 / 0
  203. -- text alignment: 0
  204. -- font id: 3
  205. -- text size: 12
  206. -- style flags: 0
  207. -- line height: 16
  208. -- part name: s
  209.  
  210.  
  211. -- part 13 (button)
  212. -- low flags: 00
  213. -- high flags: A003
  214. -- rect: left=177 top=297 right=339 bottom=323
  215. -- title width / last selected line: 0
  216. -- icon id / first selected line: 0 / 0
  217. -- text alignment: 1
  218. -- font id: 0
  219. -- text size: 12
  220. -- style flags: 0
  221. -- line height: 16
  222. -- part name: ReDo Unkown
  223. ----- HyperTalk script -----
  224. on mouseUp
  225.   answer "Go Back to Re-Test Unknown?" with "Yes" or "Cancel"
  226.   if it is "yes" then go card "begin Random"
  227. end mouseUp
  228.  
  229.  
  230.  
  231. -- part contents for card part 12
  232. ----- text -----
  233. none
  234.  none
  235.  
  236. -- part contents for card part 9
  237. ----- text -----
  238. You used 98 Seconds to run the Unknown